home *** CD-ROM | disk | FTP | other *** search
/ Apple WWDC 1996 / WWDC96_1996 (CD).toast / Technology Materials / MacOS 8 Resources / Developer Tools / Mac OS 8 Interfaces & Libraries / Interfaces / CIncludes / ASDebugging.h < prev    next >
C/C++ Source or Header  |  1996-05-01  |  6KB  |  164 lines
  1. /*
  2.      File:        ASDebugging.h
  3.  
  4.      Contains:    AppleScript Debugging Interfaces.
  5.  
  6.      Version:    Technology:    AppleScript 1.1
  7.                  Release:    Universal Interfaces 3.0d3 on Copland DR1
  8.  
  9.      Copyright:    © 1984-1996 by Apple Computer, Inc.  All rights reserved.
  10.  
  11.      Bugs?:        If you find a problem with this file, send the file and version
  12.                  information (from above) and the problem description to:
  13.  
  14.                      Internet:    apple.bugs@applelink.apple.com
  15.                      AppleLink:    APPLE.BUGS
  16.  
  17. */
  18. #ifndef __ASDEBUGGING__
  19. #define __ASDEBUGGING__
  20.  
  21. #ifndef __APPLEEVENTS__
  22. #include <AppleEvents.h>
  23. #endif
  24. #ifndef __APPLESCRIPT__
  25. #include <AppleScript.h>
  26. #endif
  27.  
  28. #ifdef __cplusplus
  29. extern "C" {
  30. #endif
  31.  
  32. #if PRAGMA_IMPORT_SUPPORTED
  33. #pragma import on
  34. #endif
  35.  
  36. #if PRAGMA_ALIGN_SUPPORTED
  37. #pragma options align=mac68k
  38. #endif
  39.  
  40. #if FOR_SYSTEM7_ONLY
  41. /*
  42. *************************************************************************
  43.     Mode Flags
  44. *************************************************************************
  45. */
  46. /*
  47.      This mode flag can be passed to OSASetProperty or OSASetHandler
  48.     and will prevent properties or handlers from being defined in a context
  49.     that doesn't already have bindings for them. An error is returned if
  50.     a current binding doesn't already exist. 
  51. */
  52.  
  53. enum {
  54.     kOSAModeDontDefine            = 0x0001
  55. };
  56.  
  57. /*
  58. *************************************************************************
  59.     Component Selectors
  60. *************************************************************************
  61. */
  62.  
  63. enum {
  64.     kASSelectSetPropertyObsolete = 0x1101,
  65.     kASSelectGetPropertyObsolete = 0x1101,
  66.     kASSelectSetHandlerObsolete    = 0x1103,
  67.     kASSelectGetHandlerObsolete    = 0x1104,
  68.     kASSelectGetAppTerminologyObsolete = 0x1105,
  69.     kASSelectSetProperty        = 0x1106,
  70.     kASSelectGetProperty        = 0x1107,
  71.     kASSelectSetHandler            = 0x1108,
  72.     kASSelectGetHandler            = 0x1109,
  73.     kASSelectGetAppTerminology    = 0x110A,
  74.     kASSelectGetSysTerminology    = 0x110B,
  75.     kASSelectGetPropertyNames    = 0x110C,
  76.     kASSelectGetHandlerNames    = 0x110D
  77. };
  78.  
  79. /*
  80. *************************************************************************
  81.     Context Accessors
  82. *************************************************************************
  83. */
  84. extern pascal OSAError OSASetProperty(ComponentInstance scriptingComponent, long modeFlags, OSAID contextID, const AEDesc *variableName, OSAID scriptValueID)
  85.  FIVEWORDINLINE(0x2F3C, 0x0010, 0x1106, 0x7000, 0xA82A);
  86.  
  87. extern pascal OSAError OSAGetProperty(ComponentInstance scriptingComponent, long modeFlags, OSAID contextID, const AEDesc *variableName, OSAID *resultingScriptValueID)
  88.  FIVEWORDINLINE(0x2F3C, 0x0010, 0x1107, 0x7000, 0xA82A);
  89.  
  90. extern pascal OSAError OSAGetPropertyNames(ComponentInstance scriptingComponent, long modeFlags, OSAID contextID, AEDescList *resultingPropertyNames)
  91.  FIVEWORDINLINE(0x2F3C, 0x000C, 0x110C, 0x7000, 0xA82A);
  92.  
  93. extern pascal OSAError OSASetHandler(ComponentInstance scriptingComponent, long modeFlags, OSAID contextID, const AEDesc *handlerName, OSAID compiledScriptID)
  94.  FIVEWORDINLINE(0x2F3C, 0x0010, 0x1108, 0x7000, 0xA82A);
  95.  
  96. extern pascal OSAError OSAGetHandler(ComponentInstance scriptingComponent, long modeFlags, OSAID contextID, const AEDesc *handlerName, OSAID *resultingCompiledScriptID)
  97.  FIVEWORDINLINE(0x2F3C, 0x0010, 0x1109, 0x7000, 0xA82A);
  98.  
  99. extern pascal OSAError OSAGetHandlerNames(ComponentInstance scriptingComponent, long modeFlags, OSAID contextID, AEDescList *resultingHandlerNames)
  100.  FIVEWORDINLINE(0x2F3C, 0x000C, 0x110D, 0x7000, 0xA82A);
  101.  
  102. extern pascal OSAError OSAGetAppTerminology(ComponentInstance scriptingComponent, long modeFlags, FSSpec *fileSpec, short terminologyID, Boolean *didLaunch, AEDesc *terminologyList)
  103.  FIVEWORDINLINE(0x2F3C, 0x0012, 0x110A, 0x7000, 0xA82A);
  104.  
  105. /*
  106.  Errors:
  107.        errOSASystemError        operation failed
  108. */
  109. extern pascal OSAError OSAGetSysTerminology(ComponentInstance scriptingComponent, long modeFlags, short terminologyID, AEDesc *terminologyList)
  110.  FIVEWORDINLINE(0x2F3C, 0x000A, 0x110B, 0x7000, 0xA82A);
  111.  
  112. /*
  113.  Errors:
  114.        errOSASystemError        operation failed
  115. */
  116. /*
  117.  Notes on terminology ID
  118.  
  119.     A terminology ID is derived from script code and language code
  120.     as follows;
  121.  
  122.         terminologyID = ((scriptCode & 0x7F) << 8) | (langCode & 0xFF)
  123. */
  124. /*
  125. *************************************************************************
  126.     Obsolete versions provided for backward compatibility:
  127. */
  128. extern pascal OSAError ASSetProperty(ComponentInstance scriptingComponent, OSAID contextID, const AEDesc *variableName, OSAID scriptValueID)
  129.  FIVEWORDINLINE(0x2F3C, 0x000C, 0x1101, 0x7000, 0xA82A);
  130.  
  131. extern pascal OSAError ASGetProperty(ComponentInstance scriptingComponent, OSAID contextID, const AEDesc *variableName, OSAID *resultingScriptValueID)
  132.  FIVEWORDINLINE(0x2F3C, 0x000C, 0x1102, 0x7000, 0xA82A);
  133.  
  134. extern pascal OSAError ASSetHandler(ComponentInstance scriptingComponent, OSAID contextID, const AEDesc *handlerName, OSAID compiledScriptID)
  135.  FIVEWORDINLINE(0x2F3C, 0x000C, 0x1103, 0x7000, 0xA82A);
  136.  
  137. extern pascal OSAError ASGetHandler(ComponentInstance scriptingComponent, OSAID contextID, const AEDesc *handlerName, OSAID *resultingCompiledScriptID)
  138.  FIVEWORDINLINE(0x2F3C, 0x000C, 0x1104, 0x7000, 0xA82A);
  139.  
  140. extern pascal OSAError ASGetAppTerminology(ComponentInstance scriptingComponent, FSSpec *fileSpec, short terminologID, Boolean *didLaunch, AEDesc *terminologyList)
  141.  FIVEWORDINLINE(0x2F3C, 0x000E, 0x1105, 0x7000, 0xA82A);
  142.  
  143. /*
  144.  Errors:
  145.         errOSASystemError        operation failed
  146. */
  147. /**************************************************************************/
  148. #endif
  149.  
  150. #if PRAGMA_ALIGN_SUPPORTED
  151. #pragma options align=reset
  152. #endif
  153.  
  154. #if PRAGMA_IMPORT_SUPPORTED
  155. #pragma import off
  156. #endif
  157.  
  158. #ifdef __cplusplus
  159. }
  160. #endif
  161.  
  162. #endif /* __ASDEBUGGING__ */
  163.  
  164.